home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / utility / utilcli / stringer.lha / Stringer21 / Install next >
Text File  |  1996-11-13  |  3KB  |  103 lines
  1. ;;
  2. ;; Installation script for Stringer v2.1
  3. ;;
  4. ;; Usage: Execute Install
  5. ;;
  6.  
  7. ; This script needs V39+ to function
  8.  
  9. VERSION >NIL: graphics.library 39
  10. IF WARN
  11.   VERSION >NIL: graphics.library 40
  12.   IF WARN
  13.     ECHO "Sorry, this script needs AmigaOS 3.0 (V39)."
  14.     ECHO "See document section 1.3 for manual installation."
  15.     QUIT
  16.   ENDIF
  17. ENDIF
  18.  
  19. ; Print out the intro text in XEN font point size 11
  20.  
  21. IF EXISTS FONTS:XEN/11 
  22.   SETFONT XEN 11
  23. ENDIF
  24.  
  25. ECHO "*N*E[43m                                                               "
  26. ECHO "   This script will install *E[32mStringer V2.1*E[31m into your system.    "
  27. ECHO "                                                               "
  28. ECHO "*E[0m*N1. The executable Stringer is copied to your C: assign"
  29. ECHO "2. The preference file you choose is copied to ENV: and ENVARC:"
  30. ECHO "3. Options 3 and 4 below copy an AREXX script to REXX:*N"
  31.  
  32. ; Ask if the user wants to install or not
  33.  
  34. REQUESTCHOICE TITLE "Stringer Installation" BODY "Do you want to install Stringer now ?" GADGETS Install Quit >env:strch1
  35.  
  36. IF $strch1 NOT EQ 1
  37.   UNSETENV strch1
  38.   QUIT
  39. ENDIF
  40.  
  41. ; Print out the install choices
  42.  
  43. ECHO "*N*E[32mSelect one of the following default preferences:*E[0m*N"
  44. ECHO "1. Plain ASCII, uses More for a pager"
  45. ECHO "2. ANSI colors, uses More for a pager"
  46. ECHO "3. ANSI colors, uses Most for a pager"
  47. ECHO "4. ANSI colors, uses Vinci for a pager*N"
  48.  
  49. ; Request a choice from the user
  50.  
  51. REQUESTCHOICE TITLE "Stringer Installation" BODY "Choose your preferred selection" GADGETS " Plain More " " ANSI More " " ANSI Most " " ANSI Vinci " >env:strch1
  52.  
  53. ; Print out the option user chose (4 = 0)
  54.  
  55. IF $strch1 EQ 0
  56.   ECHO "Installing option 4.  Please wait ...*N"
  57. ELSE
  58.   ECHO "Installing option $strch1.  Please wait ...*N"
  59. ENDIF
  60.  
  61. ; Set env variables according to users choice
  62.  
  63. SETENV strch2 "Stringer.prefs"
  64. UNSETENV strch3
  65.  
  66. IF $strch1 EQ 1
  67.   SETENV strch2 "Prefs/Stringer_plain.prefs"
  68. ENDIF
  69.  
  70. IF $strch1 EQ 2
  71.   SETENV strch2 "Prefs/Stringer_ANSI.prefs"
  72. ENDIF
  73.  
  74. IF $strch1 EQ 3
  75.   SETENV strch2 "Prefs/Stringer_Most.prefs"
  76.   SETENV strch3 "start_most.rexx"
  77. ENDIF
  78.  
  79. IF $strch1 EQ 0
  80.   SETENV strch2 "Prefs/Stringer_Vinci.prefs"
  81.   SETENV strch3 "start_vinci.rexx"
  82. ENDIF
  83.  
  84. ; Copy the program files to their places
  85.  
  86. COPY Stringer C:
  87. COPY $strch2 ENV:Stringer.prefs
  88. COPY $strch2 ENVARC:Stringer.prefs
  89.  
  90. IF EXISTS env:strch3
  91.   COPY $strch3 REXX:
  92. ENDIF
  93.  
  94. ; Clean up after installation
  95.  
  96. UNSETENV strch1
  97. UNSETENV strch2
  98. UNSETENV strch3
  99.  
  100. ECHO "*E[32mStringer*E[0m is now installed to your C: directory.*N"
  101. WAIT 2
  102. QUIT
  103.